home *** CD-ROM | disk | FTP | other *** search
- inherited frmCheckForMail: TfrmCheckForMail
- Left = 286
- Top = 120
- Caption = 'Check for mail'
- OldCreateOrder = True
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- inherited pnlTop: TPanel
- inherited lblCommandName: TLabel
- Caption = 'Check For Mail'
- end
- end
- inherited pnlCenter: TPanel
- inherited pgcControlPage: TPageControl
- ActivePage = tbsAM5Main
- inherited tbsAM5Main: TTabSheet
- object Label1: TLabel
- Left = 28
- Top = 20
- Width = 65
- Height = 13
- Caption = 'POP3 &Server:'
- FocusControl = edtServer
- end
- object Label2: TLabel
- Left = 28
- Top = 68
- Width = 52
- Height = 13
- Caption = '&Username:'
- FocusControl = edtUsername
- end
- object Label3: TLabel
- Left = 176
- Top = 68
- Width = 50
- Height = 13
- Caption = '&Password:'
- FocusControl = edtPassword
- end
- object Label4: TLabel
- Left = 28
- Top = 148
- Width = 234
- Height = 13
- Caption = 'Save an &amount of waiting messages in variable:'
- FocusControl = edtVarName
- end
- object edtServer: TEdit
- Left = 28
- Top = 36
- Width = 289
- Height = 21
- TabOrder = 0
- end
- object edtUsername: TEdit
- Left = 28
- Top = 84
- Width = 140
- Height = 21
- TabOrder = 1
- end
- object edtPassword: TEdit
- Left = 176
- Top = 84
- Width = 140
- Height = 21
- PasswordChar = '*'
- TabOrder = 2
- end
- object edtVarName: TAM5VarListComboBox
- Left = 28
- Top = 164
- Width = 289
- Height = 21
- ItemHeight = 13
- TabOrder = 4
- end
- object cbEncryptedLogon: TCheckBox
- Left = 28
- Top = 116
- Width = 97
- Height = 17
- Caption = '&Encrypted logon'
- TabOrder = 3
- end
- end
- end
- end
- inherited dxSIBarManager: TdxBarManager
- Categories.ItemsVisibles = (
- 2)
- Categories.Visibles = (
- True)
- PopupMenuLinks = <
- item
- Control = lsvAM5Errors
- PopupMenu = dxCheckPopup
- end>
- DockControlHeights = (
- 0
- 0
- 0
- 0)
- end
- inherited dxCheckPopup: TdxBarPopupMenu
- ItemLinks = <
- item
- Item = itmCheckAllErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end
- item
- Item = itmCheckNoErrors
- UserGlyph.Data = {00000000}
- Visible = True
- end>
- end
- end
-